home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / info-service / gopher / Unix / gopher1.12 / misc / Radio / radio / foo.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-08-14  |  9.9 KB  |  447 lines
  1. #include "gopher.h"
  2.  
  3.  
  4. /*
  5.  * Connect_To_Gopher Performs a connecting to socket 'service' on host
  6.  * 'host'.  Host can be a hostname or ip-address.  If 'host' is null, the
  7.  * local host is assumed.   The parameter full_hostname will, on return,
  8.  * contain the expanded hostname (if possible).  Note that full_hostname is a
  9.  * pointer to a char *, and is allocated by connect_to_gopher()
  10.  *
  11.  * Errors:
  12.  *
  13.  * -1 get service failed
  14.  *
  15.  * -2 get host failed
  16.  *
  17.  * -3 socket call failed
  18.  *
  19.  * -4 connect call failed
  20.  */
  21.  
  22. int connect_to_gopher(host)
  23.   char *host;
  24. {
  25.      int s, service;
  26.      char  buf[MAXSTR];
  27.      struct sockaddr_in server;
  28.      struct hostent *hp;
  29.  
  30.      service = 7000;
  31.      
  32.      if (host == '\0') {
  33.       gethostname(buf, sizeof(buf));
  34.       host = buf;
  35.      }
  36.  
  37.      if ((server.sin_addr.s_addr = inet_addr(host)) == -1) {
  38.       if (hp = gethostbyname(host)) {
  39.            bzero((char *) &server, sizeof(server));
  40.            bcopy(hp->h_addr, (char *) &server.sin_addr, hp->h_length);
  41.            server.sin_family = hp->h_addrtype;
  42.       } else
  43.            return (-2);
  44.      } else
  45.       server.sin_family = AF_INET;
  46.  
  47.      server.sin_port = (unsigned short) htons(service);
  48.  
  49.      if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0)
  50.       return (-3);
  51.  
  52.      setsockopt(s, SOL_SOCKET, ~SO_LINGER, 0, 0);
  53.      setsockopt(s, SOL_SOCKET, SO_REUSEADDR, 0, 0);
  54.      setsockopt(s, SOL_SOCKET, SO_KEEPALIVE, 0, 0);
  55.      if (connect(s, &server, sizeof(server)) < 0) {
  56.       close(s);
  57.       return (-4);
  58.      }
  59.      return s;
  60. }
  61.  
  62.  
  63. /*
  64. ** Feed a gopher takes a line of text and parses it.
  65. ** It returns a 0 when successful and -1 when it isn't
  66. */
  67.  
  68. int
  69. feed_a_gopher(j, sInput)
  70.   int j;
  71.   char *sInput;
  72. {
  73.      int i;
  74.      char *cPtr = NULL;
  75.      
  76.      char *CurrentChar = NULL;
  77.      i=sizeof(GopherThing);
  78.      /*memset(Gopher[j], 0, i);  Causes weird bug in A/UX*/
  79.      
  80.      
  81.      /** Get the kind of file from the first character **/
  82.  
  83.      Gopher[j].sFileType = sInput[0];
  84.      
  85.      if(Gopher[j].sFileType == A_EOI)
  86.       return(0);
  87.  
  88.      /** Suck off the User Displayable name **/
  89.      
  90.      cPtr = (char *) strchr(sInput, '\t');
  91.      if (cPtr == NULL)
  92.       return(-1);
  93.      *cPtr = '\0'; 
  94.      strncpy(Gopher[j].sTitle, sInput + 1, (int) (cPtr-sInput+1));
  95.      sInput = cPtr + 1;
  96.  
  97.      /** Suck off the Pathname **/
  98.  
  99.      cPtr = strchr(sInput, '\t');
  100.      if (cPtr == NULL)
  101.       return(-1);
  102.      *cPtr = '\0'; 
  103.      strncpy(Gopher[j].sPath, sInput , (int) (cPtr-sInput+1));
  104.      sInput = cPtr + 1;
  105.  
  106.      /** Suck off the hostname **/
  107.  
  108.      cPtr = strchr(sInput, '\t');
  109.      if (cPtr == NULL)
  110.       return(-1);
  111.      *cPtr = '\0'; 
  112.      strncpy(Gopher[j].sHost, sInput, (int) (cPtr-sInput+1));
  113.      sInput = cPtr + 1;
  114.  
  115.      Gopher[j].iPort = 0;
  116.  
  117.      /** Get the port number **/
  118.      if (isdigit(*sInput) && isdigit(*(sInput+1)))
  119.       Gopher[j].iPort = atoi(sInput);
  120.      else
  121.       Gopher[j].iPort = 0;
  122.  
  123.      return(0);
  124. }
  125.  
  126. /*
  127. **
  128. **
  129. */
  130.  
  131.    
  132. int feed_gophers(sockfd)
  133.   int sockfd;
  134. {
  135.      int i, j, k;
  136.      FILE *fp;
  137.      char ch, sTmp[sizeof(GopherThing)];
  138.      
  139.      writestring(sockfd, "\r\n");
  140.      
  141.      for (j = 0; (j < MAXGOPHERS) && (ch != EOF) && (sTmp[0] != '.'); j++)
  142.      {
  143.       bzero(sTmp, sizeof(GopherThing));
  144.       if (readline(sockfd, sTmp, sizeof(GopherThing)) == 0)
  145.            break;
  146.       
  147.       if (feed_a_gopher(j, sTmp)!=0)
  148.            j = j -1;  /** feed a gopher failed, try again **/
  149.      }
  150.      
  151.      return(j-1);
  152. } 
  153.  
  154. /*
  155. ** Open a connection to another host
  156. */
  157.  
  158.  
  159. do_telnet(iNum)
  160.   int iNum;
  161. {
  162.      char Tel_string1[128];
  163.      char Tel_string2[128];
  164.      char TelCommand[128]; 
  165.      char ch;
  166.  
  167.      /* retrieve the gopher information for the telnet command*/
  168.  
  169.      clear();
  170.      Centerline("Warning!!!!!, you are about to leave the Internet", 1);
  171.      Centerline("Gopher program and connect to another host.", 2);
  172.      Centerline("If you get stuck press the control key and the ] key,",3);
  173.      Centerline("and then type quit",4);
  174.      
  175.      sprintf(Tel_string1,"Now connecting to %s", Gopher[iNum].sHost);
  176.      if (Gopher[iNum].sPath[0] != '\0')
  177.       sprintf(Tel_string2,"Use the account name \"%s\" to log in",
  178.           Gopher[iNum].sPath);
  179.      else
  180.       Tel_string2[0] = '\0';
  181.  
  182.      Centerline(Tel_string1, LINES/2 -1);
  183.      Centerline(Tel_string2, LINES/2 +1);
  184.      Centerline("Press return to connect: ", LINES - 1);
  185.      refresh();
  186.  
  187.      while ((ch = getch()) != '\r')
  188.       ;
  189.  
  190.      exit_curses();
  191.  
  192.      strcpy(TelCommand, TELNET_COMMAND);
  193.      strcat(TelCommand, " ");
  194.      strcat(TelCommand, Gopher[iNum].sHost);
  195.  
  196.      if (Gopher[iNum].iPort != 0) 
  197.       sprintf((TelCommand + strlen(TelCommand)), " %d",Gopher[iNum].iPort); 
  198.  
  199.      system(TelCommand);
  200.      init_curses();
  201. }
  202.  
  203.  
  204. /*
  205. ** do_index gets keywords from the user to search for, and jams the
  206. ** string into the sPath part of the GopherThing Structure.
  207. */
  208.  
  209. do_index(iNum)
  210.   int iNum;
  211. {
  212.      char inputline[40];
  213.  
  214.      inputline[0] = '\0';
  215.      GetOneOption("Index word(s) to search for: ", inputline);
  216.      strcpy(Gopher[iNum].sPath, inputline);
  217. }
  218.  
  219.      
  220. /**
  221. *** Show file takes an open socket connection, writes it to a file
  222. *** and passes it to your favorite pager.
  223. **/
  224.  
  225. showfile(sockfd, iNum)
  226.   int sockfd, iNum;
  227. {
  228.      int i, iLength, childpid, wait_stat, wait_ret;
  229.      char *cp;
  230.      char tmpfilename[40];
  231.      char *tmpptr = tmpfilename;
  232.      FILE *tmpfile;
  233.      char inputline[512];
  234.      char Command[100]; 
  235.  
  236.      Draw_Status("Receiving Document...");   
  237.      refresh();
  238.  
  239.      /** Open a temporary file **/
  240.  
  241.      sprintf(tmpfilename, "/tmp/gopher.%d",getpid());
  242.  
  243.      if ((tmpfile = fopen(tmpfilename, "w")) == NULL)
  244.       fprintf(stderr, "Couldn't make a tmp file!\n"), exit(-1);
  245.  
  246.      writestring(sockfd, Gopher[iNum].sPath, strlen(Gopher[iNum].sPath));
  247.      writestring(sockfd, "\r\n", 2);
  248.  
  249.      for(;;) {
  250.       iLength = readline(sockfd, inputline, 512);
  251.       
  252.       if (iLength == 0)
  253.            break;
  254.  
  255.       ZapCRLF(inputline);
  256.       
  257.           if (Gopher[iNum].sFileType == A_CSO) {
  258.            if (inputline[0] == '2')
  259.             break;
  260.  
  261.            if ((inputline[0] >= '3') && (inputline[0] <= '9'))  {
  262.             fprintf(tmpfile, "%s\n", Gopher[iNum].sPath);
  263.             fprintf(tmpfile, "%s\n", inputline+4);
  264.             break;
  265.            }
  266.            if (inputline[0] == '-') {
  267.             if (inputline[5] != i)
  268.              fprintf(tmpfile, "-------------------------------------------------------\n");
  269.             i = inputline[5];
  270.             fprintf(tmpfile, "%s\n", inputline+7);
  271.            }
  272.       }
  273.  
  274.           if (Gopher[iNum].sFileType == A_FILE) {
  275.            if ((inputline[0] == '.') && (inputline[1] == '\0'))
  276.             break;
  277.            else {
  278.             fprintf(tmpfile, "%s\n", inputline);
  279.            }
  280.       }
  281.      }
  282.  
  283.      fprintf(tmpfile, "\012 \n\n");  /** Work around a bug in xterm n curses*/
  284.      (void)fclose(tmpfile);
  285.  
  286.      display_file(tmpfilename);
  287.  
  288.      /** Good little clients clean up after themselves..**/
  289.  
  290.      if (unlink(tmpfilename)!=0)
  291.       fprintf(stderr, "Couldn't unlink!!!\n"), exit(-1);
  292.  
  293.      init_curses();
  294. }
  295.  
  296.  
  297. pushgopher(iLevel, iNum)
  298.   int iLevel, iNum;
  299. {
  300.      OldGopher[iLevel].sFileType = A_DIRECTORY;
  301.      strcpy(OldGopher[iLevel].sTitle, Gopher[iNum].sTitle);
  302.      strcpy(OldGopher[iLevel].sHost, Gopher[iNum].sHost);
  303.      strcpy(OldGopher[iLevel].sPath, Gopher[iNum].sPath);
  304.      OldGopher[iLevel].iPort = Gopher[iNum].iPort;
  305. }
  306.  
  307. popgopher(iLevel, iNum)
  308.   int iLevel, iNum;
  309. {
  310.      Gopher[iNum].sFileType = A_DIRECTORY;
  311.      strcpy(Gopher[iNum].sTitle, OldGopher[iLevel].sTitle);
  312.      strcpy(Gopher[iNum].sHost, OldGopher[iLevel].sHost);
  313.      strcpy(Gopher[iNum].sPath, OldGopher[iLevel].sPath);
  314.      Gopher[iNum].iPort = OldGopher[iLevel].iPort;
  315. }
  316.  
  317.  
  318. void check_sock(sockfd, iNum)
  319.   int sockfd, iNum;
  320. {
  321.      char DispString[80];
  322.      char Response[40];
  323.  
  324.      Response[0] = '\0';
  325.      
  326. #ifdef DEBUG
  327.      switch(sockfd)  {
  328.      case -4:
  329.       fprintf(stderr, "connect call failed ");
  330.       break;
  331.      case -3:
  332.       (void)fprintf(stderr, "socket call failed");
  333.       break;
  334.      case -2:
  335.       (void)fprintf(stderr, "get host failed");
  336.       break;
  337.      case -1:
  338.       (void)fprintf(stderr, "get service failed");
  339.       break;
  340.      }
  341.      fprintf(stderr, "to host %s, port %d\n",
  342.          Gopher[iNum].sHost, Gopher[iNum].iPort);
  343.      exit(-1);
  344. #endif
  345.  
  346.      if (sockfd <0) {
  347.       sprintf(DispString, "Cannot connect to host %s", Gopher[iNum].sHost);
  348.       GetOneOption(DispString, Response);
  349.      }
  350. }
  351.  
  352.  
  353. /**********
  354. **
  355. ** Set up all the global variables.
  356. **
  357. ***********/
  358.  
  359. void
  360. Initialize()
  361. {
  362.      int i,err;
  363.      char *cp;
  364.      char termname[40];
  365.      static char terminal[1024];
  366.      static char capabilities[1024];   /* String for cursor motion */
  367.      
  368.      static char *ptr = capabilities;  /* for buffering         */
  369.  
  370.      /** Get the pager command **/
  371.      
  372.      if (getenv("PAGER") == NULL)
  373.       strcpy(PagerCommand, PAGER_COMMAND);
  374.      else
  375.       strcpy(PagerCommand, getenv("PAGER"));
  376.  
  377.      /*** Get the terminal type ***/
  378.  
  379.      if (getenv("TERM") == NULL)
  380.       fprintf(stderr, "I don't understand your terminal type\n"), exit(-1);
  381.      
  382.      if (strcpy(termname, getenv("TERM")) == NULL)
  383.       fprintf(stderr, "I don't understand your terminal type\n"),exit(-1);
  384.      
  385.      if ((err = tgetent(terminal, termname)) != 1)
  386.       fprintf(stderr, "I don't understand %s terminals\n",termname),exit(-1);
  387.      
  388.      if ((cp = (char *)tgetstr("cl", &ptr)) != NULL)
  389.       strcpy(sGClearscreen, cp);
  390.      else
  391.       strcpy(sGClearscreen, "");
  392.  
  393.      if ((cp = (char *) tgetstr("bl", &ptr)) != NULL)
  394.       strcpy(sGAudibleBell, cp);
  395.      else
  396.       strcpy(sGAudibleBell,"\007");
  397.  
  398.      /*** Init MainWindow ****/
  399.  
  400.  
  401.      tputs(sGClearscreen,1, outchar);     
  402.  
  403.      MainWindow = initscr();
  404. }
  405.  
  406.  
  407. char *GlobalOptions[] =  
  408. {"Pager Command", "Print Command", "Telnet Command"};
  409.                
  410.  
  411. void
  412. SetOptions()
  413. {
  414.      char Response[3][40];
  415.      
  416.      strcpy(Response[0], PagerCommand);
  417.      Get_Options("Internet Gopher Options", "", 3, GlobalOptions, Response);
  418.  
  419.      strcpy(PagerCommand, Response[0]);
  420. }
  421.  
  422. #define BUFSIZE 256
  423.  
  424. main(argc, argv)
  425.   int argc;
  426.   char *argv[];
  427. {
  428.      int sockfd, j, i;
  429.      char buf[BUFSIZE];
  430.      FILE *Play;
  431.      char Playcmd[80];
  432.  
  433.      sprintf(Playcmd, "play %s", argv[2]);
  434.  
  435.      Play = popen(Playcmd, "w");
  436.  
  437.      sockfd = connect_to_gopher(argv[1]);
  438.  
  439.      while(1) {
  440.       j = read(sockfd, buf, BUFSIZE);
  441.       for (i=0; i<j; i++)
  442.            putc(buf[i], Play);
  443.  
  444.      }
  445.       
  446. }
  447.